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GENERAL INFORMATION 


ere 
ae me oe we 


1.0 INTRODUCTION 


The Sleuth Simulator language simulates the HP 3000 Series II and 
III Sleuth programming language. The purpose of the Sleuth Sim- 
ulator is to provide as many of the HP 3000 Series II/III state- 
ments as possible to a user of an HP 3000 HP-IB version computer 
system. 


The simulator is writen in HP AID, a lower level language, and 
AID is written in SPL II. The simulator is actually a series of 
AID functions, which are a series of HP AID statements, and simu- 
lates each particular Sleuth statement defined in this manual. 
The simulator will maintain Sleuth's ability to run up to eight 
devices of various types concurrently. 

Note that all the Sleuth commands and statements available for 
the HP 3000 Series II/III are not included in this manual. 

1.1 | HARDWARE REQUIREMENTS 


The Sleuth Simulator can run on any HP 3000 HP-IB_ version com- 
puter system with the following minimum equipment: 


@ Memory - 256K bytes 
e System Console 


@ Magnetic Tape Unit for cold loading DUSIII system. 


1.2 SOFTWARE REQUIREMENTS 


@ Diagnostic Utility System III that includes AID and Sleuth 
Simulator. 


@ AID and Sleuth Simulator manuals 


1.3 SLEUTH SIMULATOR LIMITATIONS 


The Sleuth Simulator is a separate program written in the HP AID 
language. When you enter a Sleuth program, the Sleuth Simulator 
becomes a part of this program. With the Simulator becoming part 
of a user's program, the variables and word buffers normally 
available to an HP AID user program have been limited as follows: 
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Variables A through N are available 

Word Buffers AA through NN are available 
String Buffers &AA through &VV are available 
All Reserved Variables are available 


If you use any of the non-available simulation variables, word 
buffers, or string buffers, an error may be reported or the oper- 
ation of your program could be adversly affected. 


1.4 DISC LIMITATIONS 


The Sleuth default mode for the file mask (13037 controller) in 
the HP 3000 Series II/III is cylinder mode. For HP 3000 HP-IB 
version computer systems, it will be "surface mode". This limi- 


tation is created by AID's inability to distinguish a difference 
between a parameter of zero and an omitted parameter (both appear 
as zero). For example; if the following statement is entered, 


RDI 0,AA(0),0 
the simulator will set the file mask to zero. If the last zero 
is not entered at all, AID will still pass the simulator a zero. 


Therefore, the simulator cannot distinguish between an omitted 
Parameter and a zero (0). 
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2.0 LOADING SLEUTH SIMULATOR 

The Sleuth Simulator program (written in the AID language) is 
physically located on the Diagnostic Utility System III (DUSIITI) 
cold load tape under the file name SLEUTHSM. To execute the 
Sleuth Simulator program, perform the following procedure: 

‘lL. Cold load the DUSIII tape and press the console RETURN key. 


2. Once the DUS program has output its title message and prompt 
(:) enter, "AID". 


3. AID will respond with a prompt character (>) and line number: 
>10 

4. Enter "LOAD SLEUTHSM". The Sleuth Simulator is now loaded 
and you may enter your program statements or commands. 

2.1 ENTERING A SLEUTH PROGRAM 

The simulator program will occupy lines 0000-4990, leaving 5000- 

9999 for user program entry. Note that the simulator will become 

part of the program entered. . 

2.2 DELETING A SLEUTH PROGRAM 


The DELETE command must be used to erase lines of code generated 
by your entries. It will erase only the lines specified: 


D(elete) 5000/5100 
To erase both the Sleuth Simulator and your program, use the EP 
command. If this occurs inadvertantly, you can load the 
simulator again by entering "LOAD SLEUTHSM". 


All commands and statement descriptions can be found in Section 
III of this manual. 


2.3 PROCEED MODE 
The Sleuth Simulator does not turn off the proceed mode at any 
time. A user should use this HP AID statement with caution. 


Refer to the HP AID manual for more information on this 
statement. 
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2.4 LISTING PROGRAMS, BUFFERS, OR VARIABLES 


A copy of the Sleuth Simulator and/or the Users Program may be 
obtained by use of the AID "LIST" command. To list the Sleuth 
Simulator program and the users program, enter the following | on 
the next available line: 


>6010 L 


To list the Sleuth Simulator program, enter the following on the 
next available line: 


26020 L 1/5000: 


To list the users program, enter the following on the next 
available line: 


>6010 L 5000/6000 


Variables, AID reserved words, and buffers can be listed by the 
use of the following entries: 


>6010 LV {Lists all variables) 
>6010 LvV,C (Lists variable C) 
>6010 R (Lists all reserved words) 


L 
>6010 L R,PASSCOUNT (Lists the contents of the reserved 
: word PASSCOUNT) 


>6010 L B,AA (Lists the entire buffer AA) 


>6010 L !B,AA,1/10 (Lists words 1-10 of buffer AA in 
HEX format) 


Refer to the AID manual for more detailed information on the use 
of the List command. 


2.5 PROGRAM EXECUTION 


A user can execute their Program by using the AID "RUN" command 
as shown in the following example: 


>6050 BUMP C 
>6060 NEXT 5020 
>6070 RUN 


A users program can be terminated programmatically with the use 
of the AID "END" command. A user can also stop execution of a 
Program, at the console,. by entering Control Y. This will place 
them in the AID entry mode. 


834-4 


SECTION 
Itt 


STATEMENT/COMMAND STATEMENTS 


3.0 INTRODUCTION 


The following pages in this section will describe the capabili- 
ties of each simulated sleuth statement. Statements that have 
the same mnemonic as an HP AID statement, command, reserved vari- 
able, or buffer name (AA-NN), that are being simulated, will have 
an S preceeding the original mnemonic (i.e., compare buffer (CB) 
will become (SCB). : 


NOTE 


All buffers and variables must. be in upper case. The 
simulator will not recognize lower case letters. 


Functions that differ from the original Sleuth statement will 
either describe the difference or: refer to an HP AID equivalent 
statement that will perform that specific task. 


The syntax for each of the following statements defines what the 
parameters of the statement are. If a parameter is optional it 
will be enclosed by brackets (i.e., SEEK lun [,cylinder,head,sec~ 
tor}]). If SEEK 3 is entered: in a user program, then a _ seek for 
logical unit 3 to cylinder 0, head 0, sector 0 would be issued. 
The parameters that are not enclosed by brackets are required 
inputs. If any parameter is not entered, the default for that 
particular parameter is 0. This implies that a SEEK statement, 
by itself, will issue a seek for logical unit 0, to cylinder 0, 
head 0, sector 0. 


The statement descriptions on the following pages are presented 
in alphabetical order. 
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3.1 STATEMENT/COMMAND SECTION INDEX 
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3.2 COMMANDS (AID/SLEUTH) 


Refer to the AID Manual for commands, as all AID commands are 
valid for Sleuth programs. 


3.3 STATEMENTS 


General statements control system oriented data manipulation. 
Each statement description contains the formal name, the function 
name or mnemonic, the syntax of the statement, a parameter 
description, a description of the statements operation, and an 

example of the statement usage. 


Statements provided in this manual include both Sleuthsm and some 
common AID statements. AID statements are included for conven-~ 
ience of the user. Refer to the AID manual for a complete set of 
available AID statements. 
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FORMAL NAME: Address Record 


FUNCTION NAME: AR 


SYNTAX: >AR lun[,cylinder,head,sector] 


PARAMETERS: lun - Logical unit number. 


cylinder - cylinder address 
head - head address 
sector - sector address 


OPERATION: Sets logical address specified in the cylinder, 
head, and sector parameters into 7910K and 13037 disc 
controllers only, and does not reposition the heads. 


EXAMPLE: >5000 DEV 0,6,1,10,0 
>5010 AR 0,4,2,3 
>5020 RDA 0 
>5030 DISP 0,D 
>5040 RUN 


The above example uses the Address Record function to set the 
logical disc address into the disc controller. The Request Disc 
Address function and the Display function obtain and display the 
address. 
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ASSIGN 


FORMAL NAME: 


AID OPERATION 


DESCRIPTION: 


EXAMPLE(S): 


Assign Data to Buffer 


NAME: ASSIGN data buffer(element) [, (repeat 
factor)],datal[,data2, , ,datan] 


Stores data into a data buffer. The word datal is 
stored into data buffer (element) and, if included 
data2 is stored in data buffer (element+l) and so 
on through datan which is’ stored in data buffer 
(element+n). If repeat factor is included the data 
pattern is repeated (repeat-factor) times. 

Datal through datan must be numeric. 


>5000 DB AA,100,%55 -INITIALIZE AA TO $55 
>5010 ASSIGN AA(50),5,10,15, 20,25, 30,35 
(AA(50)=5, AA(51)=10, . 2. AA(56)=35) 


>5010 ASSIGN AA(10),(10),!FF 
(AA(10) THROUGH AA(19) )=!FF) 


>5010 ASSIGN AA(80),(5),3,7 
(AA(80)=3, AA(81)=7, AA(82)=3, AA(83)=7 etc.) 


>5010 LET A:=80,F:= 
>5020 ASSIGN AA(A),(F),3,7 
(Same as ASSIGN statement 5010 above ) 
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FORMAL NAME: Backspace File 


FUNCTION NAME: BSF 


SYNTAX: >BSF lun 


PARAMETER: lun - Logical unit number 


OPERATION: This function issues a backspace file to a magnetic 
tape unit. 


EXAMPLE: >5000 DEV 1,5,1,10,0 
>5005 FOR B:=0 UNTIL 10 
>5010 GAP 1 
>5020 WFM 1 
>5030 NEXT 5005 
>5035 FOR C:=0 UNTIL 9 
>5040 BSF 1 
>5050 NEXT 5035 
>5060 REW 1 
>5070 RUN 


This example demonstrates how a BSF function might be utilized in 


a user program. Eleven file marks are written on the tape then 
the tape unit is backspaced 10 file marks. 
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FORMAL NAME: Backspace Record 
FUNCTION NAME: BSR 

SYNTAX: >BSR lun 

PARAMETER: lun -— Logical unit number 


OPERATION: This function will cause the magnetic 


backspace one record from its present p 


EXAMPLE: >5000 DEV 0,5,1,10,0 
>5010 RDB AA(0),128 
>5015 FOR C:=1 UNTIL 10 
>5020 WD 0,AA(0) 
>5030 NEXT 5015 
>5035 FOR D:=1 UNTIL 9 
>5040 BSR 0 
>5050 NEXT 5035 
>5060 REW 0 
>5070 RUN 


tape unit to 
osition. 


This example writes 10 records (128 words) then backspaces 


through nine of them. 
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FORMAL NAME: 
AID OPERATION 


DESCRIPTION: 


EXAMPLE(S) : 


Sleuth Simulator Diagnostic Language 


BUMP 
ump Pass Counter 
NAME: BUMP{[;) [H] 


Increments the Reserved Variable PASSCOUNT (unless 
the H parameter, which inhibits PASSCOUNT from 
incrementing, is used) and then prints that pass 
count on the Console. The pass counter (Reserved 
Variable PASSCOUNT) is initialized to zero when- 
ever the RUN command is issued. Printing may be 
suppressed by a SNPR command and, if the optional 
semi-colon follows BUMP, no return-line feed will 
be issued after the pass counter value is printed. 


>5000 BUMP H 
>5010 RUN 


System outputs "END OF PASS 0". Note that passcount 
is still 0 after the print because of the H parm. 


>5000 BUMP; 
>5010 PRINT “FOUND A BUG!!" 
>5020 RUN 


System outputs "END OF PASS 1 FOUND A BUG!!". 
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_ FORMAL NAME: Change Buffer 
FUNCTION NAME: CHB 
SYNTAX: >CHB buf(0),type 


PARAMETERS: buf - Buffer to be changed. 
This parameter must be any buffer AA(0)-NN(0) 
where AA-NN define buffer name and (0) sets 
an HP AID pointer to the first element in the 
buffer. 


type - Type of change. 


TYPE FUNCTION 

A Fill with address 

R Randomize 

I Increment 

D Decrement 

Ss Circular shift left (shifts bits 


within each element 1 place to left) 

W Circular word shift (shifts words 
within buffer lst to last and all else 
moves down one position) 


OPERATION: The CHB command will change the contents of the 
; specified buffer. 
NOTE: Buffer manipulation with this function is slow. 


EXAMPLE: 5000 DEV 0,6,1,20,0 
5010 DB AA, 4096 
5020 ASSIGN AA(0), (1024), %52525, $125252, 66666, $33333 
5030 DB BB, 4096,0 
5040 FOR C:= 1 UNTIL 100 
5050 FOR I:=0 TO 410 
5060 WD 0,AA(0),7,1,0,0 
5070 RD 0,BB(0),7,1,0,0 
5080 SCB 0,AA(0),BB(0),5 
5090 NEXT 5040 
5100 CHB AA(0),R 
5110 NEXT 5030 
5120 RUN 


This example uses the CHB function to randomize the data buffer 
AA. It writes the preassigned buffer AA on the first 32 sectors 
of surface 0 (head 0), reads and compares the data. The buffer 
is then randomized and the process is repeated 100 times. 
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FORMAL NAME: Clear 

FUNCTION NAME: CL 

SYNTAX: >CL lun 

PARAMETER: lun - Logical unit number. 


OPERATION: The clear function pertains to disc drives only. It 
will clear any clock offset, clear status, clear the 
interface busy bit and wait for a new command. 


EXAMPLE: >5000 DEV 0,6,1,10,0 
>5010 CL 0 
>5020 RUN 


The above example issues a clear to a disc connected to _ channel 
6, device 1. 
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FORMAL NAME: 


CLREAD 


Cold Load Read 


SYNTAX: >CLREAD lun, buf (0) 


. PARAMETERS : 


OPERATION: 


EXAMPLE: 


lun - An HP 7976 Magnetic Tape Drive 


buf ~ Buffer into which data will be read. This 
parameter must be any buffer (AA(0)—NA(0) 
where AA-NN is the buffer name and 0 specifies 
the beginning position within the buffer where 
data is placed. 


Places the HP 7976 in its HP7070E emulator mode and 
one record is read. The tape must be positioned at 
Beginning-Of-Tape (BOT) and can be either a 1600 or 
6250 BPI, : 


NOTE: The purpose of the 7970E emulator mode is to 
allow the HP 7976 to be a cold-load device on 
HP systems designed to load from an HP 7970E. 


>5000 DEV 0,5,1,10,0,6250 
>5010 RDB AA(0), 4096 
>5020 DB BB, 4096,0 

>5030 WD 0,AA(0) 

>5040 REW 0 

>5050 CLREAD 0,BB(0) 
>5060 SCB 0,AA(0),BB(0) 
>5070 REW 0 

>5080 RUN 
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CORB 
FORMAL NAME: Correct Buffer 
FUNCTION NAME: CORB 
SYNTAX: >CORB lun,buf(x) 
PARAMETERS: lun - Logical unit number; must be an HP Disc 


using the HP 13037 controller. 


buf(x) - Buffer to be corrected. This parameter 
must be any buffer AA(x)NN(x) where AA-NN 
define buffer name and (x) sets an HP AID 


poLaeer to-the element in the buffer speci- 
ied by the user. 


OPERATION: This statement will correct the data buffer specified 
by the buf parameter according to the last syndrome 
requested for the logical unit designated. 


EXAMPLE: >5000 DEV 0,6,2,10,0 
>5010 DB AA, 6144, %66666 
>5020 DB BB,6144,0 
>5030 FOR A:= 0 TO 822 
>5040 SEEK 0,A,1,0 
>5050 WDI 0,AA(0) (Note disc is in surface 
mode ) 
>5060 RD 0,BB(0),1,A,1,0 
>5070 IF SS(0)=%7400 THEN 5110 
(disc status word 1 and 
2 is stored in SS(0) and 
_ ss(l)) 
>5080 SCB 0,AA(0),BB(0),5 
>5090 NEXT 5030 
>5100 END 
>5110 RSYN 0 
>5120 CORB 0,BB(0) 
>5130 GOTO 5090 
>5140 RUN 


This program writes one track of data on surface 1, reads and 
checks for possible correctable errors and then compares buffers. 
If a possible correctable data error occurs, the data buffer (BB) 
will be corrected if the request syndrome (RSYN) indicates that 
the data is correctable. 
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FORMAL NAME: 
AID OPERATION 


DESCRIPTION: 


Define Buffer 
NAME: DB Name, Length [,assignment data] 
Declares a buffer with a two (alpha) character 


name (AA, BB, ...NN) and a buffer length up to the 
allowable space available* (see MAXMEMORY under 


Reserved Variables). The parameter length is 
interpreted as a numeric (0 will delete the 
buffer). The only assignment (data) allowed at 


declaration is a string assignment for string buf- 
fers (see example) or numeric or variable for data 
buffers, where the entire buffer is stored with 
that string, numeric, or variable value. Dynamic 
allocation of buffers is allowed, but may cause 
large overhead in execution time since existing 
buffers are "packed" to allow room for a new 
buffer. Dynamic allocation will leave existing 
element values unchanged. 


EXAMPLE(S): >5000 DB AA,100 (Declares the buffer AA as 100 words 


long) 


>5000 DB &AA,10 (Declares the string buffer &AA as 


10 bytes long (note AA and &AA are 
separate buffers) ) 


>5000 DB &CC,100,"START" (Each sequential 5 byte set 


of &CC contains the 5 ASCII 
characters “START") 


>5000 DB CC,100,0 (Stores 0 in all 100 elements of 


CC) 


>5000 DB CC,110 (Reallocates CC to 110 words, first 


100 elements remain intact) 


>5000 DB CC,0 (Deletes buffer CC) 


NOTE 


Unless you want to clear a buffer by re-defining 
it again, do not include this command inside 
LOOP construct statements. Once it has been 
executed the first time the program is run, 

it would consume time for no purpose relevant _ 
to the LOOP. 


* The limit depends on the ammount of memory taken up by Sleuthsm 
and the users program. At present Sleuthsm provides a user 
with 12.8K of memory. 
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Device 


FUNCTION NAME: DEV 


SYNTAX: >DEV lun,chan,dev,errs,unit,dens 


PARAMETERS: 


OPERATION: 


EXAMPLE: 


lun - Logical unit number (0 to 7). 
chan - Channel number device connected to (0 to 15). 


dev - HP-IB device number (1 to 7). 


errs - Maximum error count the device is allowed 
(1 to 999). 


unit - Device unit number (0 to 7). 


dens - magnetic tape density, pertinient to HP 7976 
only. Must be 1600 or 6250 BPI. Default is 
6250 BPI. 


The Device statement allows the user to define the 
characteristics of a particular device and to assign 
an error count and logical unit number to that de- 
vice. This function will test for boundaries on all 
parameters, see if the entered channel and device are 
present, identify the device, obtain the device type 
for the 79XX discs (13037 controlled) and store these 
parameters in buffer 22 for future use. The DEV 
function buffer (ZZ) is structured as described in 
Appendix A. If any of these parameters exceed the 
boundaries or if a non-existent channel or device has 
been entered an error message is output to the con- 
sole and the program ends. 


>5000 DEV 1,7,2,10,0 
-OR- 
>5000 DEV 0,6,1,25,3 


NOTE 
Do not include this command inside LOOP construct 
statement's. Once it has been executed, the first 


time the program is run, it would consume time for 
no purpose. 
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FORMAL NAME: Display 


FUNCTION NAME: DISP 


SYNTAX: >DISP lun, type 


PARAMETERS: lun - Logical unit number. 


type function 

Disc Address 
Requested Status 
Sector Address 
Last Syndrome 


KNAWO 


OPERATION: This function will display the item specified in the 
type parameter for the lun indicated. 


EXAMPLE: 25000 DEV 1,6,2,10,0 (7920 disc) 
>5010 RS 1 
>5020 ROST 1 
>5030 DISP 1,R 
>5040 RUN 


Thig program will issue a random seek to a 7920A disc, request 


the status after the seek completes and print the status on the 
console. 


834-22 


Sleuth Simulator Diagnostic Language 


DS 


SSVrTISsrseBeS SS SPSS SSSESItSSVSSSsSSSSSSSCSSaSS SSS SES SSS S25 SS SSS S553 S5=E>= 


FORMAL NAME: 


Decremental Seek 


FUNCTION NAME: DS 


SYNTAX: >DS lun{,cylinder,head,sector] 


PARAMETERS : 


EXAMPLE: 


lun - Logical unit number. 
cylinder - cylinder address 


head - head address 


sector - sector address 


This function will do an initial seek to the location 
specified by the cylinder, head, sector parameters, 
default is 0,0,0. Each time the instruction is exe- 
cuted the cylinder will be decremented by 1 until it 
reaches cylinder 0. When this occurs the disc will 
seek to the maximum cylinder. This function updates 
the internal disc address. 


NOTE 
This function only operates on 7910K and 
13037 disc controllers. 


This function does not decrement a common cylinder 
table. It sets up a cylinder table based on the 
statement number making this function call. Every- 
time that statement # makes a call to this function 
it will decrement its unique table. NOTE: When us- 
ing this function remember that all read, write, and 
verify operations update the 7906/20/25A discs inter- 
nal address. If a write operation of 128 words 


started at cylinder 100,0,0 and you issued a read 
command following it, the read would begin at. cylin- 


der 100,0,1 If a decremental seek was issued before 
the write operation, another decremental seek would 
be issued before the read to properly position the 
heads. 


The maximum number of DS function calls (separate 
entries) allowed for each program is ten (10). 


>5000 DEV 0,6,1,10,0 
>5010 DS 0,822,0,0 
>5020 GOTO 5010 
>5030 RUN 


834-23 


Sleuth Simulator Diagnostic Language 


ES 


ORMAL NAME: Enable Status 
FUNCTION NAME: ES 
SYNTAX: >ES 


OPERATION: Enable Status will enable automatic checking. of de- 
vice status when utilizing Sleuth simulated state- 
ments (HP AID Functions). 


NOTE 


Enable status is an automatic default function 
of Sleuthsm and therefore, need only be used 

if a Supress Status (SST) command had previously 
been issued. 


EXAMPLE: >5000 DEV 0,6,1,15,2 
>5005 RDB AA(0),128 
>5010 DB BB,128,0 
>5015 FOR A:= 0 TO 99 
>5018 FOR B:= 0 TO 822 
>5020 WD 0,AA(0),1,A,0,63 
>5060 IFN B=822 THEN 5080 
>5070 SST (suppress status) 
>5080 RD 0,BB(0),1,A,0,63 
>5090 SCB 0,AA(0),BB(0),4 
>5100 DB BB,128,0 (zero out buffer BB) 
>5110 ES 
>5120 NEXT 5015 
>5130 NEXT 5018 
>RUN 


This example will test the last sector (63) on surface zero for a 
7925A disc. The disc file mask (1) is set (line 5020) to allow 
the unit to increment beyond the end of cylinder. A test is made 
for cylinder 822. When cylinder 822 is reached, the status is 
Suppressed for the read operation. This is required to prevent a 
seek check status error that will occur because of the buffering 
scheme of the 12745A disc interface. Refer to the RDA function 
for further information. Status checking is then enabled and 
this process is repeated for 99 more times. 


834-24 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: Expected Status 
FUNCTION NAME: ESTA 
SYNTAX: >ESTA [statusl[{,mask[,status2[,mask[,status3[,mask] ]] 


PARAMETERS: statusl - First status word for discs, line printers 
, or first two bytes of status for Mag Tape. 


mask - A word of don't care bits. Alin the mask 
corresponds to a don't care bit in the status 


status2 - Second status word for discs or third byte 
of status for Mag Tape. Mag Tape status 
byte is left justified (bits 0-7). 


status3,mask ~ Similar to above except for HP 7976 
only. 


NOTE 


If either the status or "mask" parameters 
are omitted, the omitted parameter will be zero 


OPERATION: This statement changes the expected status of the 
next statement which utilizes status checking. 


EXAMPLE: >5000 DEV 2,6,2,10,0 
>5010 ESTA !1300,,!8604, !6100 
>5020 SEEK 2,150,3,0 
>5030 GOTO 5010 
>5040 RUN 


In this example a 7925A disc will continue to seek to cylinder 
150, head 3, sector 0. The expected status is set for a status 2 
error of seek check. If the seek actually completes, then the 
following message will appear on the console: 


79XX DISC STATUS WORD 1 WORD 2 
STATUS IS 0 0 0 11111 0000 0000 00 0011 0 0 0 0000 
SHOULD BE 0 0 0100 


/ 0 0 0 
0 10011 0000 0000 / 1 xx 0011 X 0000 
0 


CYLINDER = 0, SECTOR = 0, HEAD = 


834-25 


Sleuth Simulator Diagnostic Language 


FMT 


FORMAL NAME: Format 
FUNCTION NAME: FMT 


SYNTAX: >FMT lun, DTRACKS 


PARAMETER: lun - Logical unit number. 
DTRACKS — No. of tracks that have been flagged defec 
(7902 only) 


OPERATION: This function will format a moving head disc (HP 
7902, 7905,7906,7910K,7920 & 7925). It will also 
verify each track. 


EXAMPLE: >5000 DEV 0,6,1,10,0 
>5010 FMT 0 
>5020 RUN 


When the program begins execution the following is output to the 
. console 


*Begin Format 
End Format 
End of AID user program 


* For a 7902 disc, the message "Begin Verifying Formatted Disc" 
will also appear on the console. 


834-26 


FORMAL NAME: 


Sleuth Simulator Diagnostic Language 


FOR-STEP-UNTIL 


For~-Step-Until 


AID OPERATION NAME: F[OR] exp [STEP exp] UNTIL(or TO) 


DESCRIPTION: 


EXAMPLE(S): 


terminator exp 


Provides a means of repeating a group of 
instructions between the FOR statement and a 
subsequent NEXT statement using a variable as a 
counter (the variable cannot be a buffer ele- 
ment). The STEP parameter is an optional incre- 
ment of the FOR variable with a default of 1. 
The FOR-NEXT sequence is repeated until termina- 
tor expression value is exceeded by FOR vari- 
able value. FOR statements may be nested. Note 
that no execution occurs in the FOR statement 
after the initial execution. Note also that 


UNTIL or TO may precede the terminator expres-— 
sion but UNTIL will always be listed. 
>5000 FOR I:=5 TO 50 

\ 
>5060 NEXT 5000 
This for statement will execute the statements 
between 5000 and 5060 (46 times) with I=5 
through 50 stepping one at a time. 
>5000 FOR I:=5 STEP 8 UNTIL 50 

t 
>5060 NEXT 5000 
This FOR statement will execute the statement 
between 5000 and 5060 (6 times) with I=5,13, 
21,29,37,45. 
>5000 for i:=5 step B:=8 until C:=50 

i 
>5060 NEXT 5000 


This statement sequence provides the same se- 
quence of the above statments. 


>5000 FOR AA(2):=-5 TO 50 
t 
>5060 NEXT 5000 


Buffer element AA(2) will step -5,~4,-3,-2,-1, 
0,1,.--+--50. 


*If the STEP value is negative the sequence will repeat until the 
FOR value is less then the UNTIL value. 


834-27 


Sleuth Simulator Diagnostic Language 


FUNCTION NAME: FSF 
SYNTAX: .>FSF lun 
PARAMETER: lun ~ Logical unit number 


OPERATION: This function will move the tape forward to the next 
file on the tape. 


EXAMPLE: >5000 DEV 0,5,1,15,0 
>5010 RDB AA(0),4000 
>5015 FOR C:=0 UNTIL 10 
>5020 WD 0,AA(0) 
>5030 WFM 0 
>5040 NEXT 5015 
>5050 REW 0 
>5055 FOR D:=0 UNTIL 9 
>5060 FSF 0 
>5070 NEXT 5055 
>5080 RUN 


This example writes 11 records of random data with a file mark 


after each, rewinds the tape, then forward spaces through 10 of 
them. 


834-28 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: Forward Space Record 


FUNCTION NAME: FSR 


SYNTAX: >FSR lun 


PARAMETER: lun - 


Logical unit number 


OPERATION: This function will move the tape forward one record. 


EXAMPLE: >5000 
>5010 
>5015 
>5020 
>5030 
>5040 
>5045 
>5050 
>5060 
>5070 
>5080 


DEV 0,5,1,15,2 
RDB AA(0),8000 
FOR C:=] UNTIL 10 
WD 0,AA(0) 

NEXT 5015 

REW 0 

FOR D:=1 UNTIL 8 
FSR 0 - 
NEXT 5045 

REW 0 

RUN 


This example writes 11 records of random data on tape, rewinds 
the tape, then forward spaces through 9 of them. 


834-29 


Sleuth Simulator Diagnostic Language 


FUNCTION NAME: GAP 


SYNTAX: >GAP lun 


PARAMETER: lun — Logical unit number 


OPERATION: This function will write a gap 
Magnetic tape unit. 


EXAMPLE: >5000 DEV 1,5,1,20,2 
>5010 GAP 1 
>5015 REW 1 
>5020 RUN 


on the specified 


This example erases a 3 inch portion of magnetic tape and 


rewinds. 


834-30 


Sleuth Simulator Diagnostic Language 


GET 
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FORMAL NAME: Get (Used to obtain logical unit information only) 
FUNCTION NAME: GET 
SYNTAX: >Get lun,C or D or E or U 


PARAMETERS: lun - Logical unit number. 


C = Channel number 
D = Device number 
E = Error count 
U = Unit number 


OPERATION: This statement will read from the console these 
parameters only. The HP AID statement (INPUT) pro- 
vides the standard capability of receiving operator 
input from the console. 


NOTE: AID statement INPUT can be interspersed with 
Sleuth Simulator statements as with most AID 
statements. 


EXAMPLE: >5000 PRINT "ENTER THE CHANNEL NUMBER” 
>5010 GET 0,C 
>5020 PRINT "NUMBER OF ERRORS?" 
>5030 GET 0,E 
>5040 PRINT "NUMBER OF PASSES?" 
>5050 INPUT A 
>5060 FOR I:=1 TOA 
>5070 PRINT “PASS NUMBER" ;I 
>5080 NEXT 5060 
>5090 RUN 


ENTER THE CHANNEL NUMBER 
25 : 


NUMBER OF ERRORS? 
710 . 
NUMBER OF PASSES 
22 

PASS NUMBER 1 
PASS NUMBER 2 


END OF AID USER PROGRAM 
This example shows how the GET statement may be used to dynami- 
cally obtain information from the operator. Note that the oper- 
ator input is underlined. 


834-31 


Sleuth Simulator Diagnostic Language 


GOTO_ 
FORMAL NAME: GO TO (Unconditional Branch) 
AID OPERATION NAME: GOTO Statement Number 


DESCRIPTION: Allows the program to branch unconditionally to 
another statement number. 


EXAMPLE: >5060 GOTO 5010 


The above statement transfers control to statement 5010. 


834-32 | 


Sleuth. Simulator Diagnostic Language 


FORMAL NAME: Initialize Data 


FUNCTION NAME: ID 


SYNTAX: >ID lun,buf(0)[,mask[,flag[,cylinder,head,sector}]] 


PARAMETERS: lun - 


buf - 


Logical unit number. 


Buffer from which data is read, then written 
to disc. This parameter must be any buffer, 
AA(0)-NN(0),where AA~NN define buffer name and 
(0) sets an HP AID pointer to the first 
element in the buffer. 


Note: For 7902 discs, buffer size should not exceed one 
sector (128 words). 


cylinder - 
- head = 
sector - 


flag - 


Disc parameters indicating starting location 
of initialization operation. The heads are 
assumed to be positioned over the correct 
cylinder, and will not be repositioned by 
these parameters. , 


Flags the track as: 
. § = Spare 
P - Protected 
D - Defective 
_N - Non-flagged 


mask - Loads file mask on the 13037 controller. only. 


The mask bits are: 


Bits _ Function 


“42 


13 


14 


Incremental/decremental seek. If set. 
and bit 15 is al, the cylinder address 
will be decremented when End-of- 
Cylinder; otherwise, incremented. 


Allow sparing 


Cylinder/surface mode. If set, a 
cylinder consists of all available sur- 
faces; End-of-Cylinder is set when the 
last sector of the last surface has been 
transferred. In surface mode, End-of- 
Cylinder is set when the last sector of 
any surface has been transferred. 


834-33 


Sleuth Simulator Diagnostic Language 


BITS FUNCTION 


15 Allow incremental/decremental seek. 


Default mask is surface mode. Default flag is non~flagged. De- 
fault cylinder, head and sector is 0,0,0. 


OPERATION: Initialize Data function will perform an initialize 
operation on all 79xXX disc drives. The initialize 
Operation will begin at the cylinder, head and sector: 
designated and will continue until the word count of 
the buffer is exhausted. The designation of the cy- 
linder, head and sector parameters will be accom- 
' plished in this function by’ an Address Record command 
to the 7910K and 13037 disc controller and a seek for 
the 7902 controller. 


EXAMPLE: . >5000 DEV 0,6,1,10,0 
>5010 DB AA,6144,0 
>5020 SEEK 0,10,0,0 
>5030 ID 0,AA(0),3,D,815,0,0 
>5040 SEEK 0,815,0,0 
>5050 ID 0,AA(0),3,S,10,0,0 
>5060 SEEK 0,10,0,0 
>5070 RDI 0,AA(0),7 
>5080 GOTO 5060 
>5090 RUN 


In this example a 7920A disc will seek to cylinder 10, head 0, 
sector 0, flag the entire track defective and place the address 
for its spare in the address field of each sector. It will then 
seek to a spare track (815) and flag it as a spare and write the 
address of the defective track in its address field. A loop is 
then set up to test the sparing feature. 


NOTE: A 7902 disc drive does not have spare tracks but a defec- 
tive track can be made invisible to the controller by flagging it 
defective and formatting the diskette. This process reduces’. the 
total number of available tracks on that surface. 


834-34 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: 


FUNCTION NAME: IDI 


Initialize Data Immediate 


SYNTAX: >IDE lun,buf(0)[,mask[, flag} } 


PARAMETERS: 


lun - Logical unit number 


buf - Buffer from which data is read,then written 


to disc. length determines word count of the 
write. 


This parameter must be any buffer 


AA(0)-NN(O) where AA-NN define buffer name and 


Notes:1l. 


2. 


flag - 


mask - 


Bits 


12 


13 
14 


(0) sets an HP AID pointer to first element 
in the buffer. : a 


For 7902 discs, buffer size should not exceed 
one sector (128 words). 


Multiple sector transfers on a 7910 disc 
should not cross a track boundary. Flag one 
track at a time. 


Flags the track as: 


S - Spare 

P - Protected 

D - Defective 

N - Non-flagged 


Loads file mask on the 13037 controller only. 
The mask bits are: 


Function 

Incremental/decremental seek. If set 
anad bit 15 is a l, the cylinder address 
will be decremented when End-of- 
Cylinder; otherwise, incremented. 


Allow sparing 


Cylinder/surface mode. If set, a 
cylinder consists of all available sur- 
faces: End-of-Cylinder is set when the 
last sector of the last surface has been 
transferred. In surface mode, End-of- 
Cylinder is set when the last sector of 
any surface has been transferred. 


834-35 


Sleuth Simulator Diagnostic Language 


BITS FUNCTION 


15 Allow incremental/decremental seek, 


Default flag is non-flagged. Default cylinder, head, sector is 

0,0,0. Default mask is surface mode. ‘ 

OPERATION: This function will perform an initialize operation 
on a moving head disc. The internal disc address 
will be used as the starting point of the write. 


EXAMPLE: >5000 DEV 0,6,1,10,0 

; >5010 DB AA,6144,0 
>§020 FOR C:=0 UNTIL 410 
>5030 IS 0 . 
>5040 IDI 0,AA(0) 
>5050 IS 0,0,1,0 
>5060: IDI 0,AA(0) . 
>5070 NEXT 5020 
>5080 RUN 


The above example formats the upper cartridge ona HP7906A disc. 


834-36 


Sleuth Simulator Diagnostic Language 


IF THEN 


FORMAL NAME: 


AID OPERATION 


DESCRIPTION: 


If-Then Control 


NAME: IF exp [{SPECIAL OPERATOR exp] [SPECIAL 
OPERATOR exp]] THEN statement number 


Allows the executing program to evaluate "exp" and 
if it is true (non-zero)* to transfer control to 
the statement number specified. "Exp" may be a 
simple variable; data buffer element, assignment or 
expression. Expressions may be seperated by a 
special relational operator not allowed in any 
other expression. The allowable special operators 
are: 


GT (greater: than) - 

LT (less. than) 

GE (greater than or equal to) 
LE (less than or equal to) 


*NE (not equal to) ; 


EXAMPLE(S): 


EQ (equal to) 


Each expression is evaluated and then tested (left 
to right) with the special operator. The result(s) 
of the special operator evaluation(s) is logically 
ANDed and if the overall result is true, control is 
transferred to the THEN statement. Up to three 
expressions are allowed. 


>5000 IF AA(2) THEN 5050 (If AA(2) is true 
;non-zero, go to 5050) 


>5000 IF A OR B THEN 5030 (The expression "A or B" 
is evaluated) 


>5000 IF 14 LE A:=A+l1 LE 20 THEN 5020 


(Test if Atl is between 14 
- and 20 INCLUSIVE) 


>5000 IF A:=A+1 GE B:=B+l GE C:=C+l THEN 5200 
(Test IF (At+l)>=(B+l)>=(C+41) ) 


>5000 IF 1 LT B LT 100 THEN 5020 
»TEST IF B IS BETWEEN 1 AND 100**,. 


* See IFN Statement for the reverse branch condition. 

**Note that statement 5000 would not execute the same as MIF 
1<B<100 THEN 5020 which executes as "IF(1<B)<100 THEN 5020" 
where the result of 1<B will be -l or 0. 


834-37 


Sleuth Simulator Diagnostic Language 


IFN THEN 


FORMAL NAME: IF-NOT-THEN 


AID OPERATION NAME: IFN exp THEN statement 


DESCRIPTION: Identical to the IF-THEN statement (see IF-THEN) 
except the expression “exp" is tested for fal- 
sity in determining if control is passed to the 
label “statement”. The expression value is not 
altered by the NOT function. 


EXAMPLES: >5000 IF 1 LE A LE 14 THEN 5020 
- (If A is between 1 and 14 
go to 5020) 
>5000 IFN 1 LE A LE 14 THEN 5020 | 
(If A is "NOT" between 1 
and 14 go to 5020) 
>5000 IF A THEN 5020 (If A<>0 go to 5020) 


>5000 IFN A THEN 5020 (If A=0 go to 5020) 


834-38 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: Input Data 


AID OPERATION NAME: INPUT x, [y],...[n] 
I x,ly),.-{n] 


DESCRIPTION: Provides capability of receiving operator input 
from the Console and assigning that input to a var- 
iable(s). x may be a simple variable, buffer ele- 
ment, string buffer or Reserved Variable. When 
executing, input prompts with a ? or ?? to. signify 
an input is expected (see Special Characters). 
Each input value must be separated by a comma. See 
the Reserved Variable INPUTLEN for determining the 
character length of the input. 


EXAMPLES: >5000 INPUT A (value input from console is 
interpreted and then stored in A) 


>5000 INPUT AA(2) 
(the console input will be stored in AA(2)) 


>5000 INPUT &BB(2,6) 

(5 characters are accepted from console and stored 
in string buffer BB starting at element 2 - string 
buffers must be used to contain ASCII characters) 


>5000 INPUT A,B,C 

(3 numeric values, separated by commas are 
accepted from the console and stored in variables 
A, B, and C respectively) 


>5000 INPUT A 
(1 numeric value is accepted from the console) 


NOTE: If you fail to enter the correct. amount of input parameters 
at the console, the INPUT function will output a double ?? until 
all parameters, called for by the INPUT statement, have been 
entered. 


834-39 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: 


Incremental Seek 


FUNCTION NAME: IS 


SYNTAX: >IS lun[,cylinder,head,sector] 


PARAMETERS: 


OPERATION: 


lun - Logical unit number 
cylinder - cylinder address 
head - head address : 
sector - sector address 


This function will do. an initial seek to the address 
specified in the cylinder, head and sector Ppara- 
Meters. Each time this command is executed it will 
increment the cylinder address. This function up- 
dates the internal disc address. Default cylinder, 
head and sector is 0,0,0. © 


NOTE: This function is only valid. when used for 
operations on 7910K and 13037 disc controller 


This function does not increment a common cylinder 
table. It sets up a cylinder table based on the 
statment number making this function call. Only ten 
(10) IS function calls are allowed per program. 


NOTE: All read, write, and verify operations update 
the 7906/20/25A disc internal address. Multiple use 
of this function can be used to position the 
7906/20/25A discs before write and read operations. 
See example for the IT function for more information. 


EXAMPLE: >5000 DEV 0,6,1,15,0 
>5010 FOR D:=1 UNTIL 2000 
>5020 IS 0 
>5030 NEXT 5010 
>5040 RUN 


The above example causes a moving head disc to execute one cylin- 
der incremental seeks. 


834~40 
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FORMAL NAME: 


Sleuth Simulator Diagnostic Language 


It 
BSSrse tsetse ees SSS SSeS SSS SSS SSSS SS SSSSsSSSSSsSSz2EsS=5 


Increment Track 


FUNCTION NAME: IT 


SYNTAX: >IT lun[,cylinder,head,sector] 


PARAMETERS : 


OPERATION: 


lun - Logical unit number 
cylinder - cylinder address 
head - head address 
sector - sector address 


This function will do an initial seek to the location 
specified in the cylinder, head and sector para- 
meters. It will increment the head address by one 
each time this function is called. After the last 
head has been selected the next increment will pro- 
ceed to the next cylinder. If the cylinder equals 
the last cylinder in the disc the function will seek 
to 0 and start over. This function updates’ the 
internal disc address. 


This function is only valid when used in operations 
on 7910K and 13037 disc controllers. 


This function does not increment a common. track 
table. It sets up a track table based on the state- 
ment number making this function call. A maximum of 
ten (10) IT function calls per program are allowed.» 


EXAMPLE: >5000 DEV 0,6,1,10,0 
>5005 DB AA,6144 
>5010 ASSIGN AA(0), (1536) ,%125252, 66666, $33333,%52525 
>5020 DB BB,6144 
>5030 FOR D:=1 UNTIL 4115 
>5040 IT 0 
>5050 WDI 0,AA(0) 
>5060 DB BB,0O 
>5065 IT 0 
>5070 RDI 0,BB(0),1 
>5080 SCB 0,AA(0),BB(0),5 
>5090 NEXT 5030 
>5100 RUN 


The above example indicates how this function may be used to test 
all surfaces on an HP 7920 disc. The increment track (IT) util- 
izes a separate counter for the write and read operation, thus 
assuring proper position of the heads before each write and read 


operation. 


834-41 


Sleuth Simula 


FORMAL NAME: 


AID OPERATION 


DESCRIPTION: 


EXAMPLE(S): 


tor Diagnostic Language 


Assignment 


NAME: [LET] variable:= Any variable, numeric, 
expression or string. 


Allows assignment to a variable, data buffer or 
string buffer the value of any variable, numeric, 
expression or string. This Sleuthsm command, 
unlike Sleuth, requires the use of the colon weNs 


>5000 LET A:=10 -A IS ASSIGNED THE VALUE 10 

>5000 LET C:=D+E .C IS ASSIGNED THE SUM OF D+E. 

>5000 LET AA(2):=!F  .ELEMENT 2 OF THE BUFFER AA IS 
» THE HEXADECIMAL VALUE F, 


=4 .MULTIPLE VARIABLE ASSIGNMENTS 

B:=7 .MULTIPLE EXPRESSION ASSIGNMENT 
ALLOWED. : 

>5000 LET AA(4):=B .ELEMENT 4 OF BUFFER AA IS GIVEN 

-THE VALUE OF THE B VARIABLE. 


>5000 LET A:= 
>5000 LET A:= 


>5000 LET &AA(5,9):="HELLO" 


*The LET keyw 
Play it. 


-&AA(5,6)=HE, &AA(7,8)=LL, 
&AA(),10)=00 
>5000 A:=10 -IDENTICAL TO FIRST EXAMPLE 
>5000 LET A:=B<C .A=-1 if B<C else A=0 


Ord may be omitted but a subsequent list will dis- 


834-42 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: Conditional Loop Branch 
AID OPERATION NAME: LOOPTO label 


DESCRIPTION: Causes a branch to the statement specified in 
label if a LOOP Command was previously issued, 
otherwise no action occurs 


EXAMPLE(S): > 5100 SECTION 1,5200 


> 5200 SECTION 2,5500 


. 


> 5500 LOOPTO 5100 . Go to 5100 if LOOP flag is 
- set. 


The following example shows how to set the LOOP flag: 


>5000 PAUSE (allows loop flag to be set) 
>5010 DEV 0,6,1,10,0 
>5020 ..oe5 


>5050 ..eee 
>5060 RUN 
: LOOPON (turns on loop flag) 


2 GO (program executes) 


834-43 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: Master Clear 

FUNCTION NAME: MC 

SYNTAX: >MC lun 

PARAMETER: lun - Logical unit number. 


OPERATION: This function will clear the specified unit by issu- 
ing a device clear. For the 2608A printer, a master clear will 
be sent and for the 2631A printer a clear 1 (device clear with 
parity enable) is issued. 


EXAMPLE: >5000 DEV 4,6,1,10,5 
>5010 Sst . 
>5020 SEEK 4,823 (Create a seek check ) 
>5030 ES Af 
>5040 MC 4 (Clear device and status) 
>5050 SEEK 4 (Seek to zero (0)) 
>5060 GOTO 5010 
>5070 RUN 


This example will continually loop forcing a seek check error on 
a 7920A disc. The status is Suppressed during the error condi- 
tion, enabled afterword and cleared out by the master clear (MC). 
The heads are then repositioned to cylinder 0, head 0, sector 0. 


NOTE: Recalibrate will not work in Place of the seek in line 


5050 because the disc address (cyl. 823) is beyond the maximum 
limit. 


834-44 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: End of For-Next loop 
AID OPERATION NAME: NEXT x 


DESCRIPTION: Specifies the end of a For-Next set of state- 
ments, where x must be the statement number of 
respective FOR statement (not a variable). 


EXAMPLE(S): > 5010 LET J:=5 
: > 5020. FOR K:=1 UNTIL 20 
> 5030 LET BB(K):=J, J:=J+5 
> 5040 NEXT 5020 


This set of statements would store BB(1)=5, BB(2)=10 
BB(20)=100. 


834-45 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: 


SSSSSSSSnisi sisson sseansseseescseeeseseeee---~-- 


Non-Error Pause 


AID OPERATION NAME: PAUSE 


DESCRIPTION: 


EXAMPLE(S);: 


Creates an unconditional Pause in the exe- 
cution of the user program. This statement is 
Suppressed only by the SNPS command. After a 


prompt character (>) is printed on the console 
the operator may enter any valid command. : 


> 5010 PAUSE 


> (Enter any valid command) 


834-46 


Sleuth Simulator Diagnostic Language 
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FORMAL NAME: Pause On Error 
FUNCTION NAME: PE 

SYNTAX: >PE lun 

PARAMETER: lun - Logical unit number 


OPERATION: This function will notify the user that an error 


has occurred and stop the execution of the users 
program. 


Once the function has been executed it can only be 
defeated by an AID suppress non-error pause command 
(SNPS). Program can also be continued by typing GO. 


EXAMPLE : >5000 DEV 0,6.1,15,0 
>5010 PE 0 
>5020 FOR C:#]1 UNTIL 4000 
>5030 RS 0 
>5040 NEXT 5020 
>5050 RUN 


834-47 


Sleuth Simulator Diagnostic Language 


FUNCTION NAME: POLL 
SYNTAX; >POLL lun 
PARAMETERS: lun - Logical unit number. 


OPERATION:. ‘This function causes the HP13037 disc 
resume polling. 


EXAMPLE: | >5000 DEV 0,6,1,10,0. 
~'>5010 POLL 0 
>5020 RUN 


834-48 


controller to 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: Print to Console without Pause 
AID OPERATION NAME: PR{INT] [string] [; (or ,)] (string] etc. 


DESCRIPTION: . Enables data, print spacing* or strings to be 
output to list device. This statement must be 
used to print non- error messages only (see 
EPRINT or PRINTEX for error message reporting). 
This PRINT will only be suppressed by the SNPR 
command. PRINT strings may be concatenated with 
(;) to suppress return- line feed or (,) which 
generates a return-linefeed. 


EXAMPLE(S) : > 5010 PRINT "A";2;"BC", "DE" ;3;"FGH" 
> 5020 RUN 
A. BC 
DE FGH 


> 5010 DB &AA, 10, "ABCDEFG" 
> 5020 PRINT &AA(3,6) ;2;&AA(0,2) 


> 5030 RUN 
DEFG ABC 
> 5030 


* See PRINT SPACING under Special Characters. 


834-49 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: 


Proceed 


AID OPERATION NAME: PROC [N] 


DESCRIPTION: 


EXAMPLE(S): 


This statement is used to enable(or disable when 
the N is added) the proceed mode. AID normally 
waits for each Channel Program to interrupt 
before continuing to the statement following the 
RSIO. This normal mode of having I/O with wait 
Maybe changed to = the Proceed mode(i.e. 1/0 
without wait) by using this state 


(Assume that AA and B are pre-defined Channel 
programs) | : 


> 5000 PROC »-PERFORM I/O WITHOUT WAIT 

> 5010 LET CHANNEL: = , 

> 5020 RSIO AA -START CHANNEL PROGRAM AA 

> 5030 LET CHANNEL: =3 

> 5040 RSIO BB -START CHANNEL PROGRAM BB 

> 5050 PROC: N -WAIT HERE FOR I/O TO FINISH 


834-50 


Sleuth Simulator Diagnostic Language 
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FORMAL NAME: Randomize 


FUNCTION: 


RAND 


SYNTAX: >RAND var 


PARAMETER: 


OPERATION: 


EXAMPLE: 


var - A variable designated by a letter A thru N. 


This function generates a positive random number 
and places it in the designated variable. 


>5000 RAND A 
>5010 RAND B 
>5020 RAND C 
>5030 RUN 


This example places a random number in the variables A,B & C. 
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Sleuth Simulator Diagnostic Language 
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FORMAL NAME: Recalibrate 
FUNCTION NAME: RC 
SYNTAX: >RC lun 


PARAMETER: lun - Logical unit number. 


OPERATION: This function performs a recalibrate Operation on a 
7906/20/25A moving head disc. At the completion of 
this operation the heads are located at cylinder 0, 


EXAMPLE: >5000 DEV 2,6,1,10,0 
>5010 FOR A:=1 UNTIL 50 
>5020 SEEK 2,822,0,0 


>5030 RC 2 
>5040 NEXT 5010 


>5050 RUN 


The above example will seek a HP7920A disc to cylinder 822 then 
recalibrate. This process is repeated fifty times. 


834-52 


FORMAL NAME: 


Sleuth Simulator Diagnostic Language 


RD (DISC) 


Read Data 


FUNCTION NAME: RD 


SYNTAX: >RD lun,buf(0)[,mask[,cylinder,head,sector] ] 


PARAMETERS: lun - Logical unit number. 


buf - Buffer into which data, from disc, is written. 
This parameter must be any buffer AA(0)-NN(0) 
where AA-NN define buffer name and (0) sets 
an HP AID pointer to the first element in the 
buffer. 


cylinder - starting cylinder address 
head - starting head address 
sector -~ starting sector address 


mask - Loads file mask on the 13037 controller only. 


The mask bits are: 


Bits Function 

12 Incremental/decremental seek. If set 
and bit 15 is al, the cylinder address 
will be decremented when End-of- 
Cylinder; otherwise, incremented. 


13 Allow sparing 


14 Cylinder/surface mode. If set, a cylin- 
der consists of all available surfaces; 
End-of-Cylinder is set when the last 
sector of the last surface has been 
transferred. In surface mode, End~of- 
Cylinder is set when the last sector of 
any surface has been transferred. 


15 Allow incremental/decremental seek. 


Mask default is surface mode. For the cylinder, head and sector 
parameter default is 0,0,0. 


OPERATION: 


This function will perform a read operaton on the LUN 
indicated. For 7906/20/25A discs, it includes a Set 
File Mask command followed by a Seek command to the 
cylinder, head and sector parameters. The 7902 discs 
will just seek to the designated cylinder, head, and 
sector parameters. : 


834-53 


Sleuth Simulator Diagnostic Language 


EXAMPLE: 


At the completion of a 7906/20/25A disc read opera- 
tion the internal disc address will be four sectors 
beyond the end of the last read operation. The buf- 
fering scheme of the 12745A interface, which has two 
128 word buffers, reads three sectors worth of infor- 
mation before receiving an end of data from the CPU, 
which terminates the transfer. By the time the 
12745A notifies the 13037A disc controller to _ stop 
the read, another sector has begun to be read. The 
disc has now read three sectors that were not 
transferred. The internal disc address is updated to 
point to the next sector. If a one sector read at 
cylinder 100, head 0, sector 0 were performed, the 
internal disc address will indicate cylinder 100, 
head 0, sector 4. 


>5000 DEV 0,6,1,10,0 
>5010 RDB AA(0),6144 
>5025 FOR C:=0 UNTIL 822 
>5030 DB BB,6144,0 

>5040 WD 0,AA(0),,C 

>5050 RD 0,BB(0),1,C 
>5060 SCB 0,AA(0),BB(0),4 
>5075 NEXT 5025 

>5080 RUN 


This example writes, reads, and compares buffers of a random data 
pattern on surface zero of a 7920A disc. ; 


834-54 


Sleuth Simulator Diagnostic Language 


RD (TAPE) 


FORMAL NAME: Read Data 


FUNCTION NAME: RD 


SYNTAX: >RD lun, buf (0) 


PARAMETER: lun - Logical unit number 


buf. - Buffer into which data will be read. 


This parameter must be any buffer AA(0)-NN(0) 
where AA-NN define buffer name and (0) sets 
an HP AID pointer to the first element in the 
buffer. 


OPERATION: This function will perform a read operation on the 
lun specified. 


EXAMPLE: >5000 
>5010 
>5020 
>5030 
>5040 
>5050 

~ >5060 
>5070 
>5080 


DEV 0,5,1,10,1 

RDB AA(0), 4000 

DB BB, 4000,0 

WD 0,AA(0) 

REW 0 

RD 0,BB(0) 

SCB 0,AA(0),BB(0),3 
REW 0 

RUN 


This example indicates how a read data operation may be performed 


on magnetic tape. 


This program writes one 4000 word record on 


magnetic tape then reads and checks the data. 


834-55 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: 


Request Disc Address 


FUNCTION NAME: RDA 


SYNTAX: >RDA lun 


PARAMETER: 


OPERATION: 


EXAMPLE: 


lun - Logical unit number. 


This function will return the current disc address 
stored in the controller. If a data error occurred 
it contains the address of the current sector; if 
not, it contains the address of the next logical sec- 
tor. This function may be used to determine where an 
error occurred during a verify or any other function 
which terminates with a error. The address can be 
displayed on the console with DISP function. 


At the completion of a 7906/20/25A disc read opera- 
tion the internal disc address will be four sectors 
beyond the end of the last read operation. The buf- 
fering scheme of the 12745A interface, which has two 
128 word buffers, reads three sectors worth of infor- 
mation before receiving an end of data from the CPU, 
which terminates the transfer. By the time the 
12745A notifies the 13037A disc controller to stop 
the read, another sector has begun to be read. The 
disc has now read three sectors that were not 
transferred. The internal disc address is updated to 
point to the next sector. If a one sector read at 
cylinder 100, head 0, sector 0 were performed, the 
internal disc address will indicate cylinder 100, 
head 0, sector 4, 


>5000 DEV 0,6,1,10,0 
>5010 RS 0 

>5020 RDA 0 

>5030 DISP 0,D 

>5040 RUN 


This example utilizes the RDA function to obtain the last address 
from a moving head disc. 
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Sleuth Simulator Diagnostic Language 


RDB 
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FORMAL NAME: 


Randomize Data Buffer 


FUNCTION NAME: RDB 


SYNTAX: > RDB name, length 


PARAMETERS : 


OPERATION: 


EXAMPLE: 


name - Two letter buffer name. 


length - Number of words allocated to buffer. 


This function defines randomized data buffers. only. 
Note: The HP AID statements (DB and ASSIGN) should 
be used for string buffers. This function is’ the 
Same as the Sleuth DB statement for randomizing 
buffers. It does not provide the other features of 
the Sleuth DB statement. They can be implemented with 
AID commands. For example: 


Function HP AID Format 
Define a data buffer DB AA,100,-1 

(AA) and fill it with 

minus 1. 

Define a string buffer DB &BB,10 

(BB), 10 elements long 

Define a data buffer DB CcC,100 

(CC) with alternating ASSIGN CC(0), (50), 
data patterns of %33333 $33333,%66666 


and %66666 for 100 words. 


Note: This function operates slowly (approx. 21 secs 
for 3972 words) due to the overhead required to 
access and modify a buffer. 


>5000 DEV 0,6,1,10,0 
>5010 RDB AA(0),6144 
>5020 FOR D:=0 UNTIL 822 
>5030 SEEK 0,D,2,0 

>5040 WDI 0,AA(0) 

>5050 NEXT 5020 

>5060 RUN 
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Sleuth Simulator Diagnostic Language 


RDI 
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FORMAL NAME: 


FUNCTION NAME: 


Read Data Immediate 


RDI 


SYNTAX: >RDI lun, buf (0) [, mask] 


PARAMETERS: 


lun - Logical unit number. 


buf - Buffer into which data is read. Length 


determines word count of read. This parameter 
must be any buffer AA(0)-NN(0) where AA-NN 
define buffer name and (0) sets an HP AID 
pointer to the first element in the buffer. 


mask ~ Loads file mask on the 13037 controller only. 


The mask bits are: 


Bits Function 

12 Incremental/decremental seek. If set 
and bit 15 is a 1, the cylinder 
address will be decremented when End- 
of-Cylinder; otherwise, incremented. 


13 Allow sparing 


14 Cylinder/surface mode. If set, a 
cylinder consists of all available 
surfaces; End-of-Cylinder is set when 
the last sector of the last surface 
has been transferred. In surface 
mode, End-of-Cylinder is set when the 
last sector of any surface has been 
transferred. ; 


15 Allow incremental/decremental seek. 


Default mask is surface mode. 


OPERATION: 


This function will perform a read operation with 
internal disc address designating the starting 
point of the read. This function updates the inter- 
nal address. 


834-58 


EXAMPLE: >5000 
>5010 
>5020 
>5040 
>5045 
>5050 
>5060 
>5070 
>5080 


Sleuth Simulator Diagnostic Language 


DEV 0,6,1,10,0 

DB AA,128,0 

RDI BB(0),128 

WD 0,BB(0),7,120,2,0 
SEEK 0,120,2,0 

RDI 0,AA(0),7 

SCB 0,BB(0),AA(0),3 
GOTO 5020 

RUN 


This program writes, reads and compares the continually changing 
data for cylinder 120, head 2, sector 0. 
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Sleuth Simulator. Diagnostic Language 


FUNCTION NAME: REW 
SYNTAX: >REW lun 
PARAMETER: lun - Logical unit number 


OPERATION: This function will issue a rewind command to the 
Magnetic tape unit specified. 


EXAMPLE: >5000 DEV 0,5,1,15,0 
>5005 DB &AA, 128 
?5010 ASSIGN &AA(0),(32),%123,%377, $345, 0 
>5015 FOR C:=1 UNTIL 10 
>5020 WD 0,&AA(0) 
>5030 NEXT 5015 
>5040 REW 0 
>5050 RUN 


This example writes eleven 128-byte records of data then rewinds 
the tape unit with the REW function, 


834-60 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: Rewind And Reset 
FUNCTION NAME: REWOFF 

SYNTAX: >REWOFF lun 

PARAMETER: lun ~ Logical unit number 


OPERATION: This function will rewind and reset the specified 
magnetic tape unit. 


EXAMPLE: >5000 DEV 0,5,1,15,0 
>5010 REWOFF 0 
>5020 RUN 


This example places mag tape unit 0 offline. 


834-61 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: Read Full Sector 
FUNCTION NAME: RFS 
SYNTAX: >RFS lun, buf (0) [,cylinder, head, sector] 


PARAMETERS: lun ~ Logical unit number. 


buf - Buffer into which data is read. Buffer 
length determines word count of read. This 
parameter must be any buffer AA(0)-NN(0) where 
AA-NN define buffer name and (0) sets an HP 
AID pointer to the first element in the 
buffer. 


cylinder - cylinder address 
head ~ head address 
sector - sector address 


OPERATION: This function will execute a full sector read opera- 
tion on a 7910K and the 7906/20/25A discs. The heads 
will be positioned over the correct cylinder. The 
default cylinder, head, sector is 0,0,0. The length 
of the buffer determines the the word count of the 
read. ; 


EXAMPLE: >5000 DEV 0,6,1,10,0 
>5010 DB AA, 138, %52525 
>5015 LET AA(0):=!80FE (SYNC WORD) 
>5020 DB BB,138,0 
>5030 SEEK 0,123,0,0 
>5040 WFS 0,AA(0),123,0,0 
>5050 RFS 0,BB(0),123,0,0 
>5060 SCB 0,AA(0),BB(0),3 
>5070 RUN 


In this example cylinder 123, head 0, sector 0 has had its 


address field written over by buffer AA. This track should be 
reformatted before proceeding. 


834-62 


FORMAL NAME: 


Sleuth Simulator Diagnostic Language 


Read Full Sector Immediate 


FUNCTION NAME: RFSI 


SYNTAX: oRFSI lun, buf (0) 


PARAMETER: 


OPERATION: 


EXAMPLE: 


lun - Logical unit number. 


buf - Buffer into which data is read. Buffer length 
determines word count of read. This parameter 
must be any buffer AA(0)-NN(0) where AA-NN de- 
fined as buffer name and (0) sets an HP AID 
pointer to the first element in the buffer. 


This function will perform a full sector read opera- 
tion on a 7910K and the 7906/20/25A discs. The length 
of the buffer determines the word count of the read. 
The internal disc address will be used for the start- 
ing point. The internal disc address may be set by 

a Seek or an Address Record command. 


>5000 DEV 0,6,1,10,0 

>5010 DB AA, 138,%125252 : 

>5015 LET AA(0):=!80FE (SYNC WORD) 
>5020 DB BB,138,0 

>5050 WFS 0,AA(0),150,1,5 

>5055 SEEK 0,150,1,5 

>5060 RFSI 0,BB(0) 

>5070 SCB 0,AA(0),BB(0),5 

>5080 RUN 


This example issues a SEEK (from WFS function) to address 
150,1,5 on disc, writes and reads full sectors, then com- 
pares the data. The disc will require formatting after the 
use of the WFSI function. 
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Sleuth Simulator Diagnostic Language 
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FORMAL NAME: Ripple Print 


CAUTION 


Do not use the Ripple Print function with the 
HP 2680A Page Printer. 


FUNCTION NAME: RP 
SYNTAX: >RP lun,linelength 


PARAMETERS: lun - Logical unit number. 
linelength - Number of columns defining the area 


of ripple print. 


OPERATION: This function will write write a ripple pattern on 


the lun indicated and continue until stopped with 
CNTRL Y or until 32767 lines have been printed. 


EXAMPLE: >5000 DEV 0,7,2,10,0 
>5010 RP 0,132 
>5020 RUN 


This example would result in a 132 column ripple print on DEV 2. 


834-64 


FORMAL NAME: 


Sleuth Simulator Diagnostic Language 


Request Status 


FUNCTION NAME: RQST 


SYNTAX: >ROST lun 


PARAMETER: 


OPERATION: 


EXAMPLE: 


lun - Logical unit number. 


This function will return two words of status from 
the disc controllers (status words 1 & 2). This sta- 
tus may be displayed using the DISP function. The 
status will be stored in buffer SS(0) AND SS(1) for 
any disc function error. This may be useful for user 
programs. 


>5000 DEV 0,6,1,10,0 
>5010 SEEK 0,10,0,0 
>5020 ROQST 0 

>5030 DISP 0,R 

>5040 RUN 
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Sleuth Simulator Diagnostic Language 
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FORMAL NAME: Read Record Backward 
FUNCTION NAME: RRB 

SYNTAX: >RRB lun, buf(0) 

PARAMETER: lun - logical unit number 


buf - Buffer into which data will be read. This 
buffer must be any buffer AA(0) - NN(0) 
where AA-NN defines buffer name and (0) sets 
an HP AID pointer to the first element in the 
buffer. . 


OPERATION: This function will read from the last element (byte) 
in the record toward the first. The bits within the 
bytes will remain the same if the record is read back- 
ward or forward. 


EXAMPLE: >5000 DEV 0,5,1,5,0 
>5010 DB AA, 1000, %125252 
>5020 FOR C := 0 TO 9 
>5030 DB BB, 1000,0 
>5040 WD 0, AA(0) 
>5050 RRB O, BB(0) 
>5060 SCB 0, AA(0), BB(0),4 
>5070 NEXT 5020 
>5080 RUN 


This program will write one record, read it backwards and compare 
buffer 10 times. 


Note: This function is useful when a record cannot be read 
-because of a tape error. The data beyond the error can be 
recovered. 
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Sleuth Simulator Diagnostic Language 
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FORMAT NAME: Random Seek 


FUNCTION NAME: RS 


SYNTAX: >RS lun 


PARAMETER: lun - logical unit number. 


OPERATION: This function will cause a moving head disc to seek 
randomly. This function will update the internal 
disc address. 


EXAMPLE: >5000 DEV 1,6,1,15,0 
>5010 RS 0 
>5020 GOTO 5010 
>5030 RUN 
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Sleuth Simulator Diagnostic Language 


FORMAL NAME: Request Sector Address 
FUNCTION NAME: RSA 

_ SYNTAX: >RSA lun 

PARAMETER: lun = Logical unit number. 


OPERATION: This function will return the logical sector address 
of the sector currently under the heads. This 
address may be displayed using the DISP function. 


Note: This function does not apply to 7902 and 7910K 
EXAMPLE: >5000 DEV 0,6,1,10,0 

>5010 RS 0 

>5020 RSA 0 


>5030 DISP 0,S 
>5040 RUN 


The following messages are output as a result of the above pro- 
gram executing: 


Requested Sector Address for Logical Unit 0 is: 33 
End of AID user program 


>5040 


834-68 


Sleuth Simulator Diagnostic Language 


FORMAL NAME: Request Syndrome 
FUNCTION NAME: RSYN 


SYNTAX: >RSYN lun 
PARAMETER: lun - Logical unit number. 


OPERATION: This function will obtain a seven word syndrome from 
the HP13037 (disc controller). A request syndrome 
operation may be issued after any read or verify 
operation which terminates with a possible correct- 
able data error. The seven words of information will 
be read into an internal buffer which may be dis- 
played with the DISP function. The format of the 
syndrome returned is as follows: 


WORD DEFINITION 
Status 
Cylinder 
Head/Sector 
Displacement 
Pattern 1 
Pattern 2 
Pattern 3 


NA Ue WDE 


EXAMPLE: >5000 DEV 0,6,1,15,0 
>5010 DB AA, 6144, %133333 
>5020 DB BB,6144,0 
>5030 FOR C:=1 UNTIL 5000 
>5040 IT 0 
>5050 WDI 0,AA(0),2 
>5055 If 0 
>5060 RDI 0,BB(0),3 : ‘ 
>5070 IF SS(0) = %7400 THEN 5090 (unit # in status word) 
>5080 NEXT 5030 
>5085 END -Terminates program 
>5090 RSYN 0 i 
>5100 DISP 0,Y 
>5110 RUN 


NOTE: When attempting to use an entire cylinder on a read opera- 
tion, the controller will attempt to read beyond the end of 
cylinder because of the buffering in the controller. The file 
mask must therefore be set to increment (file mask=l, 3, or 7). 


This example writes and reads data on a HP7920 disc. If a cor- 
rectable data error is detected, the syndrome is requested and 
displayed. 
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Sleuth Simulator Diagnostic Language 
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FORMAL NAME: Read With Offset 


FUNCTION NAME: RWO 


SYNTAX: >RWO lun, buf(0),mask,offset[,cylinder,head, sector] 


PARAMETER: lun - Logical unit number. 


buf - Buffer into which data is read. Buffer length 
determines word count of read. This parameter 
must be any buffer AA(0)-NN(0) where AA-NN de-~- 
fine buffer name and (0) sets an HP AID pointer 
to the first element in the buffer. 


mask ~ Loads file mask on the 13037 controller only. 
The mask bits are: 


Bits 


12 


13 
14 


15 


Function 

Incremental/decremental seek. If set 
and. bit 15 is al, the cylinder ad- 
dress will be decremented when End-of- 
Cylinder; otherwise, incremented. 


Allow sparing 


Cylinder/surface mode. If set, a cy- 
linder consists of all available sur- 
faces; End-of-Cylinder is set when the 
last sector of the last surface has 
been transferred. In surface mode, 
End-of-Cylinder is set when the last 
sector of any surface has been 
transferred. 


Allow incremental/decremental seek. 


offset - Contains cylinder offset and the separator 
clock information. 


OFFSET WORD FORMAT 


011 12 13 14 15 
CYL OFFSET ] 


io 
— 


834-70 


OPERATION: 


Sleuth Simulator Diagnostic Language 


- = Don't care 
A = Advance separator clock by 
10 nanoseconds. 
D = Delay separator clock by 
10 nanoseconds. 
S = Sign bit (offset direction) 
CYL OFFSET = Range of offset (+63 to -63 
moves heads from track center). 
Increment depends on drive type 
cylinder - cylinder address 
head - head address 


sector - sector address 


NOTE: Default for cylinder,head,sector is 0,0,0. 


This function operates like a normal read except an 
offset word is transmitted to the drive before exe- 
cuting. The cylinder, head and sector parameters are 
passed to the disc controller with an Address Record 
command. 


NOTE: This function is valid for 7906/20/25A moving 
head discs only. This function cannot read a spare 
track with offset. The offset information is lost 
when the controller seeks from a flagged defective 
track to its spare. This is a feature of the con- 
troller. 
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Sleuth Simulator Diagnostic Language 


FUNCTION NAME: RWOI 


SYNTAX: >RWOI lun,buf(0),mask,offset 


PARAMETER: 


OPERATION: 


lun ~ Logical unit number. 


buf - Buffer into which data is read. Buffer length 
determines word count of read. This parameter 
Must be any buffer AA(0)-NN(0) where AA-NN de- 
fine buffer name and (0) sets an HP AID pointer 
to the first element in the buffer. 


offset - Contains cylinder offset and the separator 
clock information. 


OFFSET WORD FORMAT 


9 10 11 12 13 14 15 
- { CYL OFFSET } 


- = Don't care 
= Advance separator clock by 
10 nanoseconds. 
D = Delay separator clock by 
10 nanoseconds. 
S = Sign bit (offset direction) 
CYL OFFSET = Range of offset (+63 to -63 
moves heads from track center). 
Increment depends on drive type 


This function executes like a normal read except off- 
set word is sent to the disc before executing. Heads 
are assumed to be positioned when using this 
function. 


NOTE: This function is valid for a 7906/20/25A mov- 
ing head disc only and it cannot read a spare track 
with offset. The offset information is lost when the 
controller seeks from a flagged defective track to 
its spare. This is a feature of the controller. 
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Read Without Verify 


FORMAL NAME 
FUNCTION NAME: RWV 
SYNTAX: >RWV lun, buf (0) [,mask[,cylinder,head,sector] ] 


PARAMETER: lun - Logical unit number. 


buf - Buffer into which data is read. Buffer length 
determines word count of read. This parameter 
must be any buffer AA(0)-NN(0) where AA-NN define 
buffer name and (0) sets an HP AID pointer to the 
first element in the buffer. 


mask - Loads file mask on the 13037 controller only. 
The mask bits are: 


Bits Function 

12 Incremental/decremental seek. If set 
and bit 15 is a 1, the cylinder 
address will be decremented when End- 
of-Cylinder; otherwise, incremented. 


13 Allow sparing 


14 Cylinder/surface mode. If set, a cy- 
linder consists of all available sur- 
faces; End-of-Cylinder is set when the 
last sector of the last surface has. 
been transferred. In surface mode, 
End-of-Cylinder is set when the last 
sector of any surface has been 
transferred. 


15 Allow incremental/decremental seek. 
cylinder ~ cylinder address 
head - head address 
sector - sector address 


Note: Default for cylinder,head,sector is 0,0,0. 
Mask default is surface mode. 
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OPERATION: 


EXAMPLE: 


This function operates like a normal read function 
but does not verify the preceding sector. No address 
checking or sparing operations occur unless a track 
boundary is crossed during the operation. 


NOTE: This function is valid only for 7906/20/25A 
moving head discs only. 


>5000 DEV 0,6,1,10,0 
>5010 DB AA,6144,0 

>5020 FOR C:=0 TO 410 
>5030 RWV 0,AA(0),2,C,0,0 
>5040 NEXT 5020 

>5050 RUN 


This example uses the RWV function to read one entire surface 
from an HP 7906A disc. 
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FORMAL NAME: Read Without Verify Immediate 


FUNCTION NAME: RWVI 


SYNTAX: >RWVI lun, buf (0) [,mask] 


PARAMETERS : 


lun - Logical unit number. 


buf - Buffer into which data is read. Buffer length 
determines word count of read. This parameter 
must be any buffer AA(0)-NN(0) where AA-NN de- 
fine buffer name and (0) sets an HP AID pointer 
to the first element in the buffer. 


mask - Loads file mask on the 13037 controller only. 


OPERATION: 


The mask bits are: 


Bits Function 


12 Incremental/decremental seek. If set 
and bit 15 is al, the cylinder ad- 
dress will be decremented when End-of- 
Cylinder; otherwise, incremented. 


13 Allow sparing 


14 Cylinder/surface mode. If set, a cy~ 
linder consists of all available sur- 
faces; End-of-Cylinder is set when the 
last sector of the last surface has 
been transferred. In surface mode, 
End-of-Cylinder is set when the last 
sector of any surface has been 
transferred. 


15 Allow incremental/decremental seek. 


NOTE: Default mask is surface mode. 


This function operates like a normal read operation 
but does not verify the preceding sector. No address 
checking or sparing operations occur unless a_ track 
boundary is crossed during the operation. The start- 
_ing point of the read will be taken from the internal 
disc address. 
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EXAMPLE: >5000 
>5010 
>5020 
>5030 
>5040 
>5050 


DEV. 0,6,1,10,0 
DB AA,128,0 

RS 0 

RWVI 0,AA(0) 
GOTO 5020 

RUN 


This example randomly seeks and uses the RWVI function to 
one sector of information. 
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FORMAL NAME: Simulated Compare Buffer 
FUNCTION NAME: SCB 
SYNTAX: >SCB lun, buf1l(0),buf£2(0),errcount[,maxcount] 


PARAMETERS: lun - Logical unit number of device being tested. 


bufl(0),buf2(0) - Buffers of which the contents are 
to be word by word compared. 


errcount - Maximum number of errors to be displayed 
for each execution. 


maxcount - Maximum number of words to be compared. 
Uses smallest buffer length if defaulted. 


OPERATION: The Compare Buffer command will compare word by word 
each element of buffers 1 and 2. 


EXAMPLE: >5000 DEV 0,6,1,10,0 
>5005 DB AA,6144 
>5010 ASSIGN AA(0), (1536) ,%125252,%52525, IFFFF, !AAAA 
>5025 FOR C:=0 UNTIL 822 
>5030 IT 0 
>5040 WDI 0,AA(0),7 
>5045 IT 0 
>5050 VERI 0,48 
>5060 DB BB,6144,0 
>5065 IT 0 
>5070 RDI 0,BB(0),7 
>5080 SCB 0,AA(0),BB(0),4 
>5090 NEXT 5025 
>5100 RUN 


The above example indicates how a compare buffer operation may be 
used to help evaluate the results of an operation. One track of 
information is written on a 7920A disc. It is then verified and 
compared until the entire disc is checked. 
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FORMAL NAME: Seek 


FUNCTION NAME: SEEK 
SYNTAX: >SEEK lun[,cylinder, head, sector] 


PARAMETERS: lun - Logical unit number, 
cylinder - Disc parameters 
head ~ for the moving 
sector - head discs. 


NOTE: Default cylinder,head,sector is 0,0,0. 


OPERATIONS: This function will cause a disc to position its heads 
Over the specified cylinder. This function also up- 
dates the internal dise address, 


EXAMPLE: >5000 DEV 0,6,1,10,0 
>5010 SEEK 0 
>5020 SEEK 0,200,3,23 
>5030 SEEK 0,405,1,5 
>5040 GOTO 5010 
>5050 RUN 


This example executes seek operations on a HP7906/20/25 disc. 
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FORMAL NAME: 


Select Unit 


FUNCTION NAME: SELU 


SYNTAX: >SELU lun,unit 


PARAMETER: 


OPERATION: 


EXAMPLE: 


lun - Logical unit number 


unit - Temporary unit select in the range of 0 to 3. 
Does not affect the logical unit number. The 
unit does not have to be on-line. 


This function will select the unit specified in the 
unit parameter. 


>5000 DEV 3,5,1,10,3 
>5010 SELU 3,1 
>5020 RUN 


This example defines the tape unit as 3, but it selects unit 1. 
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FORMAL NAME: Set File Mask 
FUNCTION NAME: SFM 
SYNTAX: >SFM lun,mask 


PARAMETERS: lun - Logical unit number. 


mask - Loads file mask on the 13037 controller only. 
The mask bits are: 


Bits Function 

12 Incremental/decremental seek. If set 
and bit 15 is a 1, the cylinder 
address will be decremented when End- 
of-Cylinder; otherwise, incremented. 


13 Allow sparing 


14 Cylinder/surface mode. If set, a cy- 
linder consists of all available sur- 
faces; End-of-Cylinder is set when the 
last sector of the last surface. has 
been transferred. In surface mode, 
End-of-Cylinder is set when the last 
sector of any surface has been 
transferred. 


15 Allow incremental/decremental seek. 


OPERATION: This function will set the file mask on the HP13037 
disc controller from bits 8-15 of the mask parameter. 
When the disc controller is first powered up the mask 
is set to surface mode, where no sparing or automatic 
seeking is performed. : 


NOTE: Default for all functions using the file mask 
parameter is 0 (surface mode). 


EXAMPLE: >5000 DEV 2,6,1,15,3 
>5010 SFM 2,7 
>5020 RUN 


This example loads the file mask on the 13037 disc controller 
with a value of 7. 
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SLEUTH Simulator Diagnostic Language 
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SYNTAX: >SKRD lun,buf(0)[(,mask[,cylinder, head,sector]} } 


PARAMETERS: lun - Logical unit number. 


buf - Buffer into which data is read. Buffer length 


determines 


word count of read. This parameter 


must be any buffer AA(0)-NN(0) where AA-NN define 
buffer name and (0) sets an HP AID pointer to the 
first element in the buffer. ‘ 


mask - Loads file mask on the 13037 controller only. 
The mask bits are: 


Bits 


12 


13 
14 


15 
cylinder - 
head = 


sector ~ 


Function 


Incremental/decremental seek. If set 
and bit 15 is al, the cylinder address 
will be decremented when End-of- 
Cylinder; otherwise, incremented. 


Allow sparing 


Cylinder/surface mode. If set, a cylin- 
der consists of all available surfaces; 
End-of-Cylinder is set when the last 
sector of the last surface has been 
transferred. In surface mode, End-of-~ 
Cylinder is set when the last sector of 
any surface has been transferred. 


Allow incremental/decremental seek. 


cylinder address 
head address 


section address 


NOTE: Default for cylinder,head,sector is 0,0,0. 
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OPERATION: This function will perform a seek to the specified 
location and read that data into the specified 
buffer. The internal disc address is updated by this 
function. 


EXAMPLE: >5000 DEV 0,6,1,10,2. 
>5010 DB AA,128,0 
>5020 SKRD 0,AA(0),2,10,1,2 
>5030 RUN 
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FORMAL NAME: Seek write Data 


FUNCTION NAME: SKWD 


SYNTAX: >SKWD. lun, buf (0) [,mask[,cylinder, head, sector] } 


PARAMETERS: lun - Logical unit number. 


buf - Buffer from which data is read, then written to 


disc. 
read. 


Buffer length determines word count of 
This parameter bust be any buffer AA(0) 


through NN(0), where AA-NN define buffer name and 
(0) sets an HP AID pointer to the first element 
in the buffer. 


mask - Loads file mask on the 13037 controller only. 
The mask bits are: 


Bits 


12 


13 
14 


15 
eylinder - 
head = 


sector = 


Function 

Incremental/decremental “seek. If set 
and bit 15 is.a l, the cylinder address 
will be decremented when End- 
of-Cylinder; otherwise, incremented. 


Allow sparing 


Cylinder/surface mode. If set, a cylin- 
der consists of all available surfaces; 
End-of-Cylinder is set when the last 
sector of the last surface has been 
transferred. In surface mode, End-of- 
Cylinder is set when the last sector of 
any surface has been transferred. 


Allow incremental/decremental seek. 


cylinder address 
head address 


sector address 


NOTE: Default for cylinder,head,sector is 0,0,0. 
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OPERATION: This function will issue a seek to specified location 
and read the data, then write it into the specified 
buffer. The internal disc address is then updated. 


NOTE: This function is only valid for 79xXxX discs 
that are controlled by the 13037 controller. 


EXAMPLE: >5000 DEV 0,6,1,10,0 
>5010 RDB AA(0), 4096 
>5020 DB BB,4096,0 
>5030 FOR C:=1 UNTIL 100 
>5040 RAND I 
>5050 LET A:=I MOD 411 
>5060 LET B:=I MOD 4 
>5070 LET C:=I MOD 48 
>5080 SKWD 0,AA(0),7,A,B,C 
>5090 SKRD 0,BB(0),7,A,B,C 
>5100 IF SS(0) = $7400 THEN 5120 
>5105 SCB 0,AA(0),BB(0),3 
>5110 NEXT 5030 
>5115 END -Terminates program 
>5120 RSYN 0 
>5130 DISP 0,Y 
>5150 RUN 


This example uses the SKWD and SKRD functions to test a HP7906 
disc. 
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FORMAL NAME: Switch Output 


FUNCTION NAME: SOUT 


SYNTAX: >SOUT 


OPERATION: Switch output will output error messages to the 
lineprinter or the system console. Initially error 
messages will be output to the system console. Each 


souTt 
error 


EXAMPLE: >5000 
>5010 
>5020 
>5030 
>5040 
>5050 
>5070 
>5080 


The above example 


statement will alternate the output device for 
messages. 


DEV 0,6,1,10,1 

DB AA, 128,%052525 
sout : 
FOR B:=0 TO 410 
SEEK 0,B,0,0 

wD 0,AA(0),7,B,0,0 
NEXT 5030 

RUN 


will switch the reporting of error messages 


from the console to the lineprinter. Note if a lineprinter is 
not connected to the system, the output will default to the 


console. 
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FORMAL NAME: Suppress Status 
FUNCTION NAME: SST 
SYNTAX: >SST 


OPERATION: This function will disable status checking for all 

; statements following this function statement. Status 
checking can be re-enabled by using the Enable Status 
‘function (ES) of AID. 


EXAMPLE: >5000 DEV 5,6,1,10,3 
>5010 DB AA,128,0 
>5020 ssT 
>5030 RD 5,AA(0),1,822,8,47 
>5040 PRINT “BUFFER AA(4)=",AA(4) 
>5050 RUN 


This example suppresses the status error that would normally 
occur when trying to read the last sector of a 7925A disc. Refer 
to the RDA function for more information on 12745A interface 
nt palahoas -G@uring a read. The fifth word of the sector is then 
displayed on the console. ~ Hs 
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STAT 
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FORMAL NAME: Status Dump 
FUNCTION NAME: STAT 
SYNTAX: >STAT lun[,C or ,D] 


PARAMETERS: lun - logical unit number 
C -- Obtains channel registers (0-F) status 
D - Obtains device status 

OPERATION: This statement will obtain status from the channel or 
device specified whether an error has occurred or not 


and print it on the console. If the device is an HP 
7976, the status from the last operation is printed. 


EXAMPLE: >5000 DEV 0,6,1,10,0 
>5020 STAT D 
>5030 RUN 


The above example will print the device status of the disc. In 
this case status words 1 and 2 will be displayed on the console. 
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FORMAL NAME: Channel Program Timeout Flag 
AID OPERATION NAME: TIMEOUT 


DESCRIPTION: To disable the software timer, the user program 
May set TIMEOUT equal to -1. To increase the 
time allowed by N times, the user may set TIME- 
OUT to N. The timeout period is approximately 3 
seconds. 


INITIALIZED TO: Zero 


5010 .SET UP FOR SCOPE LOOP 

5020 LET CHANNEL: =2 

5030 TIMEOUT:=-1 .DISABLE I/O TIMEOUTS 
5040 DB CC,3,!1400 «READ DISC ADDRESS 
5050. BSIO AA 

5060 WR 8,CC(0),2 

5070 .RR 8,CC(1),4 

5080 GOTO 5060 

5090 RSIO 

5100 RUN 


EXAMPLE(S) : 


VVVVV VV Vv Vv 
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VER 
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FORMAL NAME: Verify 


FUNCTION NAME: VER 


SYNTAX: >VER lun, secount [,cylinder,head,sector] 


PARAMETERS: lun - 


Logical unit number. 


secount - Numbers of sectors to be verified. 


cylinder - cylinder address 


head 


sector | 


NOTE: 


- starting. head address 
- starting sector address 


Default for cylinder,head,sector is 0,0,0. 


OPERATION: This function will verify the data on a number of 
sectors on a moving head disc. 


EXAMPLE: >5000 
>5010 
>$020 
>5030 
>5040 
>5050 
>5060 


DEV 1,6,1,10,3 
SFM 1,7 

FOR I:=0 TO 410 
SEEK 1,1,0,0 
VER 1,192,1,0,0 
NEXT 5020 

RUN 


This example verifies one cylinder at a time until the entire 
7906 disc is checked. 


834-89 


SLEUTH Simulator Diagnostic Language 


VERI 


FORMAL NAME: Verify Immediate 
FUNCTION NAME: VERI 


SYNTAX: >VERI lun,secount 


PARAMETERS: lun - Logical unit number. 


secount - Number of sectors to be verified. 


OPERATION: This function will verify the data on a number of 
sectors on a moving head disc. The starting point 
will be the internal disc address. 


EXAMPLE: >5000 DEV 4,6,1,15,2 
>5010 DB AA,128,%155555 
>5020 RS 4 
>5030 WDI 4,AA(0) 
>5040 VERI 4,1 
>5050 GOTO 5020 
>5060 RUN 


This example seeks to random locations, writes and verifies one 
sector. 
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WD (DISC) 


FORMAL NAMEs Write Data 


SYNTAX: >WD Iun,buf(0)[{,mask[,cylinder,head,sector]] 


PARAMETERS: lun - Logical unit number. 


buf - Buffer from which data is read, then written to 


disc. 
read. 


Buffer length determines word count of 
This parameter must be any buffer AA(0) 


through NN(0), where AA-NN define the buffer name 
and (0) sets an HP AID pointer to the first 
element in the buffer. 


mask - Loads file mask on the 13037 controller only. 
The mask bits are: 


Bits 


12 


13 
14 


15 
cylinder - 
head - 


sector = 


Function 


Incremental/decremental seek. If set 
and bit 15 is a 1, the cylinder address 
will be decremented when End-of- 
Cylinder; otherwise, incremented. 


Allow sparing 


Cylinder/surface mode. If set, a cylin- 
der consists of all available surfaces; 
End-of-Cylinder is set when the last 
sector of the last surface has been 
transferred. In surface mode, End-of- 
Cylinder is set when the last sector of 
any surface has been transferred. 


Allow incremental/decremental seek. 


cylinder address 
head address 


sector address 


NOTE: Default for cylinder,head,sector is 0,0,0. 
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OPERATION: 


EXAMPLE: 


This function will write the data specified by the 
buf parameter beginning at the location specified by | 
the cylinder, head, sector Parameters, An Address 
Record command will be issued to the disc controller 
to pass the cylinder, head and sector parameters. 
This is required to simulate the Sleuth format. This 
function updates disc internal address. 


>5000 DEV 0,6,1,10,0 
>5010 RDB AA(0),6144 
>5020 FOR I:=0 TO 410 
>5040 WD 0,AA(0),7,1,0,0 
>5050 NEXT 5020 

>5060 RUN 


This example fills one surface of a HP7906 disc with random data. 
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WD (LP) 
FORMAL NAME: Write Data 
CAUTION 
Do not use the WD (LP) command with the HP 2680A 
page printer. 
FUNCTION NAME: WD 
SYNTAX: WD lun, buf(0),mode,linelength 
PARAMETERS: lun - Logical unit number 
buf - Buffer containing write data. 
This parameter must be any buffer AA(0)-NN(0) 
where AA-NN define buffer name and (0) sets 
an HP AID pointer to the first element in the 
buffer. 
linelength - Length of each line. 


mode =~ Format character as indicated below: 


BIT COMMAND 
CODE 9 10 11 12 #13 14 #15 
0 0 O 0 0 0 0 0 SUPPRESS SPACE ** 
l 0 60 0 19] 0 0 1 SINGLE SPACE 
2 0 0 0 0 0 1 0 DOUBLE SPACE 
63 0 4l 1 1 1 1 1 63 SPACES 
64 1 0 0 0 0 0 0 Chan 1(Top of form) * 
65 1 0 0 0 0 0 1 Chan 2(bottom of form) * 
66 1 0 0 0 0 1 0 Chan 3(Single space forms 
step~over)* 
67 1 0 0 0 0 1 1 Chan 4(Double space forms 
step-over) 
68 1 0 0 0 1 0 0 Triple space forms step- 
over)* 
69 1 0 0 0 1 0 1 Next one-half page* 
70 1 0 0 0 1 1 0 Next one-fourth page* 
71 1 0 0 0 1 1 1 Next one-sixth page* 


*Assigned according to HP programming standards. 


** Not allowed for 2608A. Results are indeterminate. 
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OPERATION: 


EXAMPLE: 


This function will write data from the specified 
buffer, perform the indicated mode: command over 
the length specified by the linelength. parameter 
and transmit this data to the lun specified. 


>5000 DEV 0,7,2,10,0 
>5010 DB AA, 66,12345 
>5015 FOR C:= 1 UNTIL 100 
>5020 WD 0,AA(0),1,132 
>5030 NEXT 5015 

>5040 RUN 
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WD (TAPE) 
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Write Data 


WD 


SYNTAX: WD lun, buf (0) 


PARAMETER: 


’ OPERATION: 


EXAMPLE: 


lun - 


buf - 


Logical unit number 


Buffer that contains the write data. 
This parameter must be any buffer AA(0)-NN(0) 


where AA-NN define buffer name and (0) sets 


an HP AID pointer to the first element in the 
buffer. : 


This function will execute a write operation on the 
specified unit. 


>5000 
>5010 
>5015 
>5020 
>5030 
>5040 
>5050 


DEV 0,5,1,10,0 

RDB AA(0),8000 (statement takes approx. 45 sec) 
FOR:C:= 1 UNTIL 50 

WD 0,AA(0) 

NEXT 5015 

REW 0 

RUN 


This example writes records of 8000 random words of data 50 
times on mag tape unit 0. 
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FUNCTION NAME: WDI 
SYNTAX: >WDI lun, buf (0) [,mask] 


PARAMETERS: lun - Logical unit. number. 


buf - Buffer from which data is read, then written to 

= disc. Buffer length determines word count of 
read. This parameter must be any buffer AA(0) 
Through NN(0), where AA-NN define buffer name 
and (0) sets an HP AID pointer to the first 
element in the buffer. 


mask - Loads file mask on the 13037 controller only. 
The mask bits are: 


Bits Function 


12 _Incremental/decremental seek. If. set 
and bit 15:is a 1, the cylinder address 
will be decremented when End-of - 
Cylinder; otherwise, incremented. 


13 Allow sparing 


14. -. Cylinder/surface mode. If set, a cylin- 
der consists of all available surfaces; 
End-of-Cylinder is set when the last 
sector of the last surface has been 
transferred. In surface mode, End-of- 
Cylinder is set when the last sector of 
any surface has been transferred. 


15 Allow incremental/decremental seek. 


OPERATION: This function will write data on a moving head disc. 
The internal disc address will designate the starting 
point of the write operation. This function updates 
the internal disc address. 


EXAMPLE: >5000 DEV 0,6,1,10,0 
25010 DB AA,128,$155555 
>5020 RS 0 
>5030 WDI 0,AA(0),7 
>5040 GOTO 5020 
>5050 RUN 
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FORMAL NAME: Write File Mark 


FUNCTION NAME: WFM 
SYNTAX: >WFM iun 
PARAMETER: lun - Logical unit number 


OPERATION: This function will write a file mark on the specified 
unit. 


EXAMPLE: >5000 DEV 0,5,1,10,0 
>5010 DB FF,6000,%22222 
*>5020 WD 0,FF(0) 
>5030 WFM 0 
>5040 REW 0 
>5050 FSF 0 


>5060 REWOFF 0 
>5070 RUN 


This example writes a file mark on mag tape, rewinds and then 
forward spaces to the file mark. © 


* This parameter must be any buffer AA(0) through NN(0) where AA 
through NN define buffer name and (0) sets an HP AID pointer to 
the first element in the buffer. 
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FUNCTION NAME: WFS 
SYNTAX: >WFS lun, buf (0) [, cylinder, head, sector] 


PARAMETERS: lun ~ Logical unit number. 


buf ~ Buffer from which data is read, then written to 
disc. Buffer length determines word count of 
read. This parameter must be any buffer AA(0) 
through NN(0), where AA=NN define buffer name 
and (0) sets an HP AID pointer to the first 
element in the buffer. 


cylinder - starting cylinder address 
head - starting head address 
sector - starting sector address 


NOTE: Default for cylinder,head,sector is 0,0,0. 


OPERATION: This function will write a full sector on a moving 
head disc. Note the disc should be formatted after 
this operation. This function writes over the 
address field. 


NOTE: This function is valid for 7910 and 79XX discs 
only. It updatesthe ‘internal address of the disc. 


EXAMPLE: >5000 DEV 1,6,1,10,2 
>5010 DB AA, 138,%125252 
*>5015 LET AA(0):=!80FE,AA(1):=400,AA(2):=1305 
>5020 DB BB,138,0 
>5040 WFS 1,AA(0),400,1,5 
>5050 RFS 1,BB(0),400,1,5 
>5060 SCB 1,AA(0),BB(0),5 
>5070 RUN 


* AA(O) equals the sync word. 


This example performs a single write full sector and a read full 
sector on a HP7906/20/25A disc. The buffers are then checked to 
verify the data. 
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FORMAL NAME: Write Full Sector Immediate 
FUNCTION NAME’: WFSI 
SYNTAX: oOWFSE lun, buf(0) 


PARAMETERS: lun - Logical unit number. 


OPERATION: Buffer from which data is read, then written to 
disc. Buffer length determines word count of 
read. This parameter must be any buffer AA(0) 
through NN(0), where AA~NN define buffer name 
and (0) sets an HP AID pointer in the first 
element in the buffer. 


OPERATION: This function will perform a full sector write opera~ 
tion on a 7910K and 7906/20/25A discs only. The 
imternal disc address will be used and updated as the 
starting point. 


EXAMPLE: >5000 DEV 0,6,1,10,0 
+5010 RDB AA(0),138 
>5020 DB BB,138,0 
>5030 SEEK 0 
>5034 RFSI 0,AA(0) 
>5037 LET AA(5):= ~AA(5) 
>5040 WFSI 0,AA(0) 
>5050 RDI 0,BB(0) 
>5060 RUN 


This example uses the WFSI function to force a possible correct- 


able data error negating the sixth word of buffer AA and using 
the original CRC value. 
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APPENDIX 
A 


RESERVED BUFFERS AND VARIABLES 








The following lists those buffers and variables reserved for use 
by the Sleuth Simulator functions along with a brief explanation 
of assignment. 


BUFFER USAGE 
00 RESERVED 
PP RESERVED 
2Q RESERVED 
RR Contains Magnetic tape and line printer commands. 
ss Contains status command and information as follows: 


Last status in 0 andl 
Status request command in 2 
Expected status in 3 and 4 
Don't care masks in 5 and 6 
Printer status in 7 


HP 7970E Tape status in 8 and 9; ESTA in 10 = 15 


TT Contains dise syndrome information 
UU Channel program buffer for general usage 
vv Channel program buffer primarily for obtaining disc 


address and other general usage. 


ww Used for passing commands and information - usage 
is as follows: 


0 = command 
1-3, 6-8, and 16 = command or information 
4 = disc cylinder information 


5 = Head and sector information 


834-101 


Sleuth Simulator Diagnostic Language 


BUFFER 


USAGE 
9 = counter 
10 = DSJ information 
11 = Sleuthsm variable usage indicator 
12 = Not used 
13-15 = disc parameters (cyl,hd,sect) 
17 = SCB error count 
18 = suppress status flag 
19 = Pause on error flag 
20 = DSJ information 


21 = # of sect/cyl 


22 = command 


23 = cyl information 

24 = head and sector information 
25 = Head count for verify error 
26 Sector count for verify error 


27 = Next sector after verify error 


28 and 29 = internal disc address (head & sector) 


30-32 = beginning cylinder, head, and sector 
address for a read or verify 


33 = final head address 

34 = final sector address 

35 = SOUT counter 

40-49 = IS function line number 
50-59 = IS function cylinder number 
60-69 = DS function line number 


70-79 = DS function cylinder number 


834-102 


BUFFER 


XX 


YY 


22 


Sleuth Simulator Diagnostic Language 


USAGE 
80-89 = IT function line number 
90-99 = IT function head number 
100-109 = IT Function cylinder number 
Channel program buffer that is variable in length 
and is built every time a channel program is 
executed. 
CPVA buffer (See Appendix B in the 7906,7920,7925 


Verifier Manual for more information). 


This buffer contains DEV function parameters as 
follows: 


USAGE 


Initially variables 0 - Z act as pointers to set up 
the logical unit table. This table contains all 
necessary parameters for a particular device usage 
and is located in buffer 22. Once the variable in- 
formation stored in buffer ZZ, all are then avail- 


able for general usage by the Sleuth simulator 
functions. 


NOTE: Attempted use of these variables by a user 
will adversely affect the users program. 


0-7 = Logical unit: number 

8 = Ripple print counter 

9 = Printer page length counter 

10-17 = Channel number 

18 = Identify code of executing device 
19 = FMT cyl counter 

20-27 = device number 


28 


number of bytes per page (WD function) 


29 Data overrun counter for 12745A 


834-103 


Sleuth Simulator Diagnostic Language 


BUFFER 


7x Oo VW O 


USAGE 
30-37 = number of errors 
38 = Top of form indicator (WD function) 


39 = Number of characters to be printed on the 
next page for the WD function. 


40-47 = Unit number 

50-57 = EXP status 2 word 

60-67 = Mask words 

70-77 = 13037 disc type 

80-87 = device indentification code 
88-90 = HP 7976 LDEV 0 STATUS 

91-93 = HP 7976 LDEV 1 STATUS 


94-96 = HP 7976 LDEV 2 STATUS 


97-99 = HP 7976 LDEV 3 STATUS 


STRING BUFFER 
&WW 
&XX 
&YY 


&22 


100-102: = HP 7976 LDEV 4 STATUS 
103-105 = HP 7976 LDEV 5 STATUS 
106-108 = HP 7976 LDEV 6 STATUS 


109-111 = FP 7976 LDEV 7 STATUS| 


USAGE 
RESERVED 
RESERVED 
Print buffer 


Contains information for user error reporting as 
follows: 


0 = variable name 


1-2 = buffer name 


834-104 


* * 4 Fe e * 


* 


er 
INDEX OF STATEMENTS/COMMANDS BY DEVICE TYPE 


GENERAL 


ASSIGN 
BUMP 

CHB 

DB 

DEV 

ES 

ESTA ; 
FOR-STEP-UNTIL 
GET 
GOTO 

IF THEN 
IFN THEN 
INPUT 
LET 
LOOPTO 
MC 

NEXT 
PAUSE 

PE 

PRINT 
PROC 
RAND 

RDB 

SOUT 

Sst 

STAT 
TIMEOUT 


* HP AID STATEMENTS 


834-105 


DISC 


AR 


CORB 
DISP 
DS 
FMT 
ID 
IDI 


It 
POLL 
RC 
RD 
RDA 
RDI 
RFS 
RFSI 
RQST 
RS 
RSA 
RSYN 
RWO 
RWOT 
RWV 
RWVI 
SCB 
SEEK 
SFM 
SKRD 
SKWD 


VERI 
WD 
WDI 
WFS 
WFSI 


INDEX 


TAPE LP 


BSF RP 
BSR WD 
CLREAD 

FSF 

FSR 

GAP 

RD 

REW 

REWOFF 

RRB 

SELU 

WD 

WEM 


